inherited frmListagemFornecedor: TfrmListagemFornecedor
  Left = 447
  Top = 169
  Caption = 'Listagem de Fornecedores'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited pnltop: TPanel
    inherited btnInserir: TSpeedButton
      OnClick = btnInserirClick
    end
    inherited btnAlterar: TSpeedButton
      OnClick = btnAlterarClick
    end
    inherited btnExcluir: TSpeedButton
      OnClick = btnExcluirClick
    end
  end
  inherited grdlistagem: TDBGrid
    OnDrawColumnCell = grdlistagemDrawColumnCell
    OnTitleClick = grdlistagemTitleClick
    Columns = <
      item
        Expanded = False
        FieldName = 'FOR_CODIGO'
        Title.Caption = 'C'#243'digo'
        Width = 57
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'FOR_NOMEFANT'
        Title.Caption = 'Nome Fantasia'
        Width = 489
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'FOR_CNPJ'
        Title.Caption = 'CNPJ'
        Width = 92
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'FOR_RAZAOSOCIAL'
        Title.Caption = 'Raz'#227'o Social'
        Width = 401
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'FOR_INSCESTADUAL'
        Title.Caption = 'Insc. Estadual'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'FOR_FONE'
        Title.Caption = 'Telefone'
        Width = 80
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'FOR_EMAIL'
        Title.Caption = 'E-mail'
        Width = 466
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'FOR_SITUACAO'
        Title.Caption = 'Situa'#231#227'o'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'COD_MUN_IBGE'
        Title.Caption = 'Municipio'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'FOR_CEP'
        Title.Caption = 'CEP'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'CODIGO_UF_IBGE'
        Title.Caption = 'Estado'
        Width = 65
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'FOR_DATACAD'
        Title.Caption = 'Data do Cadastro'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'FOR_ENDERECO'
        Title.Caption = 'Endere'#231'o'
        Width = 497
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'FOR_SITE'
        Title.Caption = 'Site'
        Width = 91
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'FOR_OBS'
        Title.Caption = 'Observa'#231#227'o'
        Width = 497
        Visible = True
      end>
  end
  inherited dslistagem: TDataSource
    DataSet = DM.cdsFornecedor
  end
  inherited sdsComando: TSQLDataSet
    MaxBlobSize = -1
    SQLConnection = DM.BancoEstoque
  end
end
